home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Tech Arsenal 1
/
Tech Arsenal (Arsenal Computer).ISO
/
tek-04
/
422mods.zip
/
TANIS004.422
< prev
next >
Wrap
Text File
|
1993-03-07
|
5KB
|
155 lines
Tanis004.mod, old logoff matrix i made, but now, NO ERRORS!
Pull #783 @17310
Wednesday, March 3, 1993 11:24 pm
┌────────────────────────────────────────────────────────────────────────────┐
│ Mod Name: : TANIS004.MOD Author : Tanis Half-Elven 1@17315 │
│ Difficulty : Easy <Block Read> Date : 3/3/93 │
│ Files Modded : BBSUTL.C, FCNS.H, BBS.C. │
│ WWIV Version : 4.22 │
│ Description : A log off matrix. With lots of functions. │
└────────────────────────────────────────────────────────────────────────────┘
I got this idea from some wierd bbs i had never seen before. I liked the
letter log off matrix, and decided to make one. Well i used part <very little>
of code from Master Dragon's (1@5801 WWIVNET) Last Chance menu for 4.12. he
used #'s instead of letters, logged you off after you made a choice, and mine
returns you to the logoff matrix instead of the bbs.
-*-*-* Thanx to Galen Pathwarden <again> for help with the endit *-*-*-
-*-*-* statements. *-*-*-
Aslo in this mod, there are two neat things. One is the account self
deletetion mod by Fletcher Christian (1@17305 WWIVNET) for 4.12. In that mod
i stuck a line that will print who deleted them selves in the sysoplog, just
so you will know who has been on.
Ok now on with the mod.
Step 1: BACK UP YOUR SOURCE!!!!!. This is very important, and i am not
responsible to what happens.
Step 2: Open BBSUTL.C.
Step 3: Block read void lastmenu(void) at the top.
void lastmenu(void)
{
char ch, s1[80], *s;
int endit=0;
topscreen();
do {
outchr(12);
printfile ("LASTMENU");
prt(2,"Which (C,F,E,L,Q,?) : ");
ch=onek("CFEL?Q");
switch(ch) {
case 'C':
helpl=3;
reqchat();
break;
case 'F':
strcpy(irt,get_stringx(1,14));
irt_name[0]=0;
grab_quotes(NULL, NULL);
email(1,0,0,0);
break;
case 'E':
send_email();
break;
case 'L':
nl();
nl();
prt(5,get_string(28));
helpl=12;
if (yn()) {
outchr(12);
npr("7You have spent %s minutes of your life here.",ctim(timer()-timeon));
nl();
/* npr("7You have 2%d gold 7left.",(int)thisuser.gold); */
/* nl(); */ /* Use this part only if you have the gold mod in*/
if (thisuser.logons==1) {
printfile("ACCOUNT");
prt(2,"Would you like to keep your account here? ");
if (yn()) {
printfile("LOGOFF");
hangup=1;
endit=1;
} else {
s[0]=0;
sprintf(s,"6*** 1%s 7Deleted himself!!!",thisuser.name);
nl();
sysoplog(s);
hangup=1;
endit=1;
dtr(0);
deluser(usernum);
checkhangup();
}
}
printfile("LOGOFF");
nl();
hangup=1;
endit=1;
}
break;
case '?':
break;
case 'Q':
endit=1;
break;
}
} while ((!endit) && (!hangup)); return;
}
Step 4: Save & Close BBSUTL.C
Step 5: Open FCNS.H
Step 6: Search for bbsutl.c, and stick in the extra line.
/* File: bbsutl.c */
void lastmenu(void); /* Add - Me */
void far *malloca(unsigned long nbytes);
Step 7: Close & Save FCNS.H.
Step 8: Open BBS.C
Step 9: Search for case 'O':, and delete it. then stick this in it's place.
case 'O':
lastmenu();
break;
Step 10: Search again, and do the same thing.
Step 11: Close and Save BBS.C.
Step 12: Quit and Recompile!
Easy huh? Well if you want to stick and of your own cases, copy the case
statements up there, substitue your own letter, stick the endit statement
and break; at the end. Also stick the letter in ch=onek(...);. And finally
edit your own lastmenu.msg and .ans. oh here at the bottom are lastmenu and
account.msg. If you have any questions, comments or problems with this mod, I
can be reached at 1@17315 or via the WWIVLink Mod Discussion sub. Cya.
7Tanis
5The Half-Elven
Lastmenu.Msg
<YOUR BBS NAME HERE> Log off matrix
+-----------------------------------Commands----------------------------------+
|<C> Try to Chat with <YOUR NAME HERE> <Say goodbye> |
|<F> Leave Feedback to the Management <Complain again> |
|<E> Send E-Mail to another user <Send a letter to a friend> |
|<L> Logoff and see the pretty ansi <Return to the REAL world> |
|<?> Redisplay this menu and the promt <I can't read!> |
|<Q> Quit logging off and return to <YOUR BBS NAME HERE> <Why leave?> |
+-----------------------------------------------------------------------------+
Account.Msg
Thanks for call us here at <YOUR BBS NAME HERE>. Now that you have had a
chance tolook around and get a feel fo the board, I'd appreciate you letting
me know ifyou intend to call again. If you answer no, it will in no way prevent
you from calling again and acessing the system.
<YOUR NAME HERE>
Till next mod, CYA!